#
<init>
subevent(mapinit,);
zukan(warppos:*all,|=,hokora);

subevent(sethkrbgm,);

evflagsw(ex_uam,==,0); if(nowres); evflagsw(ex_uam,=,1); resevent(@ex_uam,); endif;


#Ƃo
<out>
fade(out,(type=fade,color=000000,wait=16)); fc(*actor,move,0,0,center); changemap(tB[h);
evflagsw(ex_intro,==,0); if(nowres); subevent(intro,); else; fade(in,(type=fade,color=000000,wait=16)); endif;


#n
<to_b1>
#disptoimage; changemap(Kn); subevent(hkr_yj,0); mapname(0); imagescl(0,0,-8,32); return; image();
#disptoimage; changemap(Kn); mapname(0); imagescl(0,0,-8,32); return; image();
fade(out,(type=fade,color=000000,wait=16)); changemap(Kn); mapname(0); fade(in,(type=fade,color=000000,wait=16));


<mame>
fcwait(*actor);

#fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,(face=+evfch:sri,swait=-1),u{̃A[Nip[U߂ėAǂɂ͑Ώł܂ʂȁcB\[Ȗłȁv); goto(1); endif;
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,(face=+evfch:sri,swait=-1),u{̃A[Nip[U߂ėĂvȂ悤AǂƏCsɗ܂˂΂Ȃ܂ʂȁcv); goto(1); endif;
fc(*actor,pic,==,mame); if(nowres); text(1,(face=+evfch,swait=-1),u̕^ĂƂ́AXɊłȁv); goto(1); endif;
fc(*actor,pic,==,demond); if(nowres); text(1,(face=+evfch:sri,swait=-1),u̎p̎҂ɂ́ACoӎ𓾂܂ʂȁv); goto(1); endif;
#fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,(face=+evfch,swait=-1),u̎p̎ҒBɊւẮAَ҂ɂ͑z܂ȁcv); goto(1); endif;
#̎p̎ҒBɊւĂ̏́Ǎ͂ƌ܂ʂȁcc
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,(face=+evfch,swait=-1),u̎p͒XɎhłȁv); goto(1); endif;
#[ށcc{ɏoĂ珬SDĂ܂Ă܂ʂȁcc
#̎p̎ҒBccɊւẮcćcč́ccƁcc܁ccʂȁcc
#fc(*actor,pic,==,senksha); if(nowres); text(1,(face=+evfch,swait=-1),u̎p̎ҁACɂȂ邩܂ʂAɉ悤łBhbvACe͑_đ͖܂ʂȁv); goto(1); endif;
#BFXȓ悤ł䂦AACeΖʔ܂ʂȁBAł͔ɍł܂邪AS̈̒liŔĂ鏊悤ł
fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,(face=+evfch,swait=-1),uAɉ悤łȁv); goto(1); endif;
fc(*actor,pic,==,haniwa); if(nowres); text(1,(face=+evfch,swait=-1),uAACe蒆Ɏ߂Ȃ悤łȁv); goto(1); endif;
#member(head, pcond, cond,ωp,!=,0);
#member(head, facepic:ad, !=,*none);
fc(*actor,pic,>=,mame); if(nowres); text(1,(face=+evfch,swait=-1),upςĂĂAɂ͂悭킩܂v); endif;
#BpɂēȔ̂́ÃtÄꕔ̎ҒBƁAIȎҒBAăip[̖{n̓炢̂悤ł
label(1);

#text(1,(face=+evfch,swait=-1),u퓬̗KĂ݂ł킷Hv\n̐퓬ł͕ĂIɂȂ܂B);
text(1,(face=+evfch,swait=-1),u퓬̗KĂ݂ł킷Hv\n%ct3̐퓬ŕĂyieBȂǂ͂܂B%cd);

select2(reset,all);
select2(+Ă邺I(ic=sword,id=0));
evflagsw(pr_mame,==,1); if(nowres); select2(+Ă邺II(ic=crsword,id=1)); endif;
evflagsw(pr_mame2,==,1); if(nowres);
#select2(+dwCxgi߂(ic=question,id=2));
select2(+I}PCxgi߂(ic=question,id=2));
#dwCxg̃qg~
#select2(+̑̔חvf̃qg~(ic=question,id=3));
select2(+%it[*ip[]𖄂߂(ic=question,id=4)); item(check:aleq|alpt|bank,ip[,1); unif(nowres); select2(setenable,,0); select2(setname,,=,*HHH); endif;
select2(+qgɂ(ic=question,id=5)); 
#fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); select2(+̎p̃Lɂ(ic=question,id=6)); endif;
endif;
select2(+Ƃ܂B(ic=escape));
while;
select2(*(cid=-2));

#퓬
if(evf(*selected) == 0);
fade(out,type=blind(0,3)); battle((enegr=},back=house2,bgm=*nochange,winbgm=*nochange,losebgm=*nochange,fade=(type=blind(0,3)),stm=0,btm=if|ae)); fade(in2,type=blind(0,3));
if(evf(*selected) == 1); evflagsw(pr_mame,=,1); text(1,(face=+evfch:sml,swait=-1),u̒qv); goto(4); endif;
if(evf(*selected) == 2); text(1,(face=+evfch,swait=-1),u@ԈႦ܂ȁH@w%sk[*ʏU].nmicxłs͂łv); goto(4); endif;
goto(2);
endif;

#{C퓬
if(evf(*selected) == 1);
fade(out,(type=blind(0,9),color=btdefo,dep=btdefo,rot=btdefo,wait=btdefo)); battle((enegr=}Q,back=house2-2sc,bgm=*nochange,fade=(type=blind(0,9)),stm=0,btm=if|ae)); fade(in2,type=blind(0,9));
if(evf(*selected) == 1); evflagsw(pr_mame2,=,1); text(1,(face=+evfch:sml,swait=-1),u\v); goto(4); endif;
#text(1,(face=+evfch,swait=-1),u΂炵B悭܂v); goto(4);
#evflag(main,<,2,6,); evflag(main,<,3,7,); evflag(gcseis,==,0,8,); evflag(deckbr,==,0,9,);
if(evf(*selected) == 2); text(1,(face=+evfch,swait=-1),u܂܂Cs܂ʂ̂cBアGƂ΂ĂĂX͂Ȃ܂ʂv); goto(4); endif;
goto(2);
endif;

#I}PCxgqg
if(evf(*selected) == 2);
#if(evf(*sw:wp_kofun) == 0); text(1,(face=+evfch,swait=-1),ủƂ̋ߏɗLÕۂɂ؂񑫂^ł݂Ă͂łȁv); next; endif;
zukan(item:ip[,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uɗLnGۂCɂȂ܂v); next; endif;
zukan(item:̌,==,0); and; zukan(item:,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uɗLs~bhۂCɂȂ܂v); next; endif;
not; item(check:eq,̌,1); or; not; item(check:eq,̏,1); and; zukan(item:,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*̌]xƁw%it[*̏]x͈ꉞ茳ɒuĂƗǂ܂ʂBɗLs~bhۂɂēł̂łȁv); next; endif;
#zukan(warppos:hokora2,==,0); if(nowres); text(1,(face=+evfch,swait=-1),u܂͓A̎O̔ɌĂƂɊĂ݂Ă͂ǂłȁv); next; endif;
zukan(warppos:forest1,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uxŋCɂȂ\𕷂L܂ȁB܂͏ꏊłTĂ݂Ă͂łȁBGɑɒT@oL܂v); next; endif;
evflagsw(pr_forest1,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*X̃_W]x̓䂩CɂȂ܂ȁBBACeW݂AƂł傤ȁBSĂȂɉɉBĂC܂v); next; endif;
#zukan(warppos:hokora3,==,0); if(nowres); text(1,(face=+evfch,swait=-1),u܂́w%map[*Agl]x𔲂ɌĂƂɊĂ݂Ă͂ǂłȁv); next; endif;
zukan(warppos:forest2,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uxłAxƎ悤ȋCɂȂ\𕷂L܂ȁB܂͏ꏊłTĂ݂Ă͂łȁB炵ꏊ͂ȂĂC܂v); next; endif;
evflagsw(pr_forest2,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*X̃_WQ]xCɂȂ܂ȁBX̓́AĊOǂ悤Ȃ̂̂悤ȋC܂BAĂ̂̓ACeƂ͌Ȃ܂ʂȁv); next; endif;
zukan(warppos:tower,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uɌĂ铃ۂ̂CɂȂ܂ȁv); next; endif;
#item(check:aleq|alpt|bank,񕜂̏,1); or; evflagsw(pr_plane,==,1);
zukan(item:񕜂̏,==,0); and; evflagsw(pr_plane,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*]xɂ͉閧C܂邼BɂΔ肪qgɂȂĂC܂ȁv); next; endif;
not; item(check:eq,񕜂̏,1); and; evflagsw(pr_plane,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*񕜂̏]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*]xɂēł̂łȁv); next; endif;
zukan(warppos:haikyo,==,0); if(nowres); text(1,(face=+evfch,swait=-1),un̖kijɌĂƂCɂȂ܂ȁv); next; endif;
zukan(item:toolset,==,0); and; evflagsw(pr_plane,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*p]x̒ɂ鏬CɂȂ܂ȁBllǎtqgɂȂĂC܂邼B̃qgʂ̂ƂłȂƎvꂽȂ΁Axŕ݂Ă݂ƗǂC܂v); next; endif;
#xɂqg邩܂ʂ
not; item(check:eq,toolset,1); and; evflagsw(pr_plane,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*toolset]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*p]xɂēł̂łȁv); next; endif;
zukan(map:pВn,==,0); if(nowres); text(1,(face=+evfch,swait=-1),ullaɂxbĂ݂܂ȁH@w%map[*p]xɂ͖d|悤łȁBړIʂAC𔲂Ȃǂ܂ʂv); next; endif;
#if(evf(*sw:pr_dark) == 0); 
#AɂCtǂ܂ʂ
#zukan(map:ip[{aRe,==,0); if(nowres); text(1,(face=+evfch,swait=-1),ȕ͂Ȃ̂ȋC܂ȁv); next; endif;
#zukan(map:ip[{aSe,==,0); if(nowres); text(1,(face=+evfch,swait=-1),ȕ͂Ȃ̂ȋC܂ȁBЂƂ܂ip[̖{n̍ŏKڎwĂv); next; endif;
if(evf(*sw:pr_honpen) == 0); text(1,(face=+evfch,swait=-1),ȕ͂Ȃ̂ȋC܂ȁBЂƂ܂ip[Rcœ|ڎwĂv); next; endif;
#zukan(map:ip[{aSe,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{aRe]x֓ô͓łȁH@ꌩꏊłA͍sĂ݂̂łv); next; endif;
item(check:aleq|alpt|bank,gchyaku,1); or; item(check:aleq|alpt|bank,gchyakupp,1); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{aSe]x̎OijɗLƂŔCɂȂ܂ȁBph̔ccJĂ܂Ɩʓ|Ȕ̎ł傤ȁB̈ێɖ𗧂茳ɎĂȂKvL悤łȁB̏ԂōxAJĂ݂Ă͂łȁv); next; endif;
#w%map[*ip[{aSe]x̎OijɗLƂŔȂ񂾂CɂȂė܂ȁB
zukan(warppos:*all,!&,mount); if(nowres);text(1,(face=+evfch,swait=-1),uw%map[*ip[{aSe]x̉ijɗLƂLqCɂȂ܂ȁB{a쐼ij̕ӂɉL悤łȁBn`ɐS͗L܂ʂȁBA͊֌WC܂v); next; endif;
zukan(item:̈,==,0); and; zukan(item:,==,0); or; zukan(map:^̎RQ,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*^̎R]xTsȋC܂v); next; endif;
not; item(check:eq,̈,1); and; zukan(item:,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*̈]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*^̎R]xɂēł̂łȁv); next; endif;
#ɉLC܂
zukan(item:,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uȑOǂ̃_W̒ŁAQ̐X̓ĂƉNIȘb𕷂܂ʂłȁv); next; endif;
#ȑOǂɁAQ̐X̓ƉL肻ȏꏊL܂ʂł
zukan(item:,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*X̃_W]xɍ݂ƂΔ̓eCɂȂ܂ȁBэ~ċAȂAɗL悤ȋC܂v); next; endif;
#item(check:aleq|alpt|bank,,1); or; item(check:aleq|alpt|bank,ɒ,1); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*X̃_W]xɍ݂ƂΔ̓eCɂȂ܂ȁBэ~ċAȂAɗL悤ȋC܂v); next; endif;
#zukan(item:,==,1); and; not; item(check:eq,,1); and; not; item(check:aleq|alpt|bank,ɒ,1); if(nowres);
not; item(check:eq,,1); and; zukan(item:ɒ,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*^̎R]xɂĔэ~肸ɋA邱Ƃœł̂łȁv); next; endif;
zukan(map:LmRʘHn,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*^̎R]x̉̓V󕔂ɗLƂLqCɂȂ܂ȁBsƋA肪āAAɂ͉ĂȂꏊɐS͗L܂ʂȁBA𒍈Ӑ[ׂƗǂ܂ʂȁv); next; endif;
#if(evf(*sw:pr_honpen) == 0); text(1,(face=+evfch,swait=-1),ȕ͂Ȃ̂ȋC܂ȁBЂƂ܂ip[Rcœ|ڎwĂv); next; endif;
#܂̓ip[Rcœ|ڎwĂ
if(evf(*sw:pr_plane) == 0); text(1,(face=+evfch,swait=-1),us@̏Cłłȁv); next; endif;
zukan(item:cavkey,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{a]x̂OӂɌƂACɂȂ܂ȁBnɗLقłBƂvCȂĂC܂v); next; endif;
not; item(check:eq,cavkey,1); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*cavkey]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*Agl]xɂēł̂łȁv); next; endif;
zukan(map:Agln,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uオ悤ɂȂAs͈͂L̂ł͂ȂłȁBЂƂ܂FXĂ݂Ɨǂ܂ʂv); next; endif;
zukan(item:caskey,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*Agl]x̒nCɂȂ܂ȁBɍLĂ悤ɌāA͈ڂŌnɋԂȋC܂B~肪ɂȂĂ悤ȋC܂ȁv); next; endif;
not; item(check:eq,cavkey,1); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*cavkey]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*Agl]x̒nɂēł̂łȁv); next; endif;
#w%map[*Agl]x̒nCɂȂ܂ȁBki㉺Ej[vł鎖ɂ͈Ӗ͖C܂B~肪|CgȋC܂
zukan(map:ip[{an,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*caskey].nmicx̐CɂȂ܂ȁB{aƂ̂́w%map[*ip[{a]x̎ł傤ȁB̓ǂɗL邩́Afɍl΋XC܂B炳܂ɉL܂ʂłȁBڂÂ点΁AႢ邩܂ʂȁv); next; endif;
#evflagsw(pr_caslb,==,0);
evflagsw(pr_dfvala2,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{an]xCɂȂ܂ȁBԎ̏ꏊł́A݂ɓꏊɉL邩܂ʂȁBʂɒӐ[邾łA킩邩܂ʂȁv); next; endif;
zukan(item:fbLuV,==,0); and; evflagsw(pr_deckbr,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{an]xCɂȂ܂ȁB{X|Anɖ߂OɂׂL肻ȋC܂v); next; endif;
not; item(check:eq,fbLuV,1); and; evflagsw(pr_deckbr,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uww%it[*fbLuV]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*ip[{an]xɂēł̂łȁv); next; endif;
if(evf(*sw:pr_seacave) == 0 && evf(*sw:pr_seacave2) == 0); text(1,(face=+evfch,swait=-1),uw%map[*ip[{an]xɗLƂLqCɂȂ܂ȁBwɕтxƂ̂́A{a̋߂Ƃ̖{̋߂ƂqCgl̎ŗǂC܂BȂ̔ꂵꏊcǂ̎xɂȊ̂̂o܂v); next; endif;
#{a̋߂Ƃ̖{̋߂ƂqCgl̎ł傤ȁB\Iƌ΁Axł
if(evf(*sw:pr_seacave) == 0 || evf(*sw:pr_seacave2) == 0); text(1,(face=+evfch,swait=-1),uw%map[*Ĉق猊]xCɂȂ܂ȁB͈ł͖܂ʂv); next; endif;
zukan(item:[Č,==,0); and; zukan(item:ɒ,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*Ĉق猊]x́TChCɂȂ܂ȁBHă_Ȃ΁AႤił݂̂ǂ܂ʂv); next; endif;
not; item(check:eq,[Č,1); and; zukan(item:ɒ,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*[Č]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*Ĉق猊]x́TChɂēł̂łȁv); next; endif;
#}ꂵĂ鎖ɂ́AӖ̂܂ʂȁBŋ߁A|炵bꂽ{ǂŌ悤Ȋo܂邼
#}ꂵĂ鎖ɂ́AӖ̂܂ʂB
#Ĉق猊CɂȂ܂ȁBɂLqqgɂȂĂC܂B邮ƂӖł͖AwxƂӖł傤ȁBv鏊΁AɂL̂܂ʂ
#w}ΉxƂ̂
if(evf(*sw:pr_jikken) == 0); text(1,(face=+evfch,swait=-1),uオ悤ɂȂĂs悤ɂȂŁA炳܂ɉ𖢂ƂĂC܂v); next; endif;
zukan(item:ɒ,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*X̃_W]xɏĂƂޗAɑĂ邩܂ʂBǂɍޗv肻ȏꏊ͗L܂ʂłȁBw%map[*Ĉق猊]x̍͊֌WC܂v); next; endif;
not; item(check:eq,ɒ,1); and; zukan(warppos:omake,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*ɒ]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*^̎R]x̉̓V󕔂ɂēł̂łȁv); next; endif;
#item(check:eq,ɒ,1); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*X̃_W]xɏĂƂޗAɑĂ邩܂ʂBǂɍޗv肻ȏꏊ͗L܂ʂłȁBw%map[*Ĉق猊]x̍͊֌WC܂v); next; endif;
#AꏊdvȋC܂ȁBS肪΁A܂ōsꏊTĂ݂邵܂ʂȁcB]肵ĂȂ΁AƂ͂ȂC܂B
zukan(item:,==,0); and; evflagsw(pr_rockpc,==,0); if(nowres); text(1,(face=+evfch,swait=-1),ux̂ǂɃbN̊|L悤ȊoL܂ȁBɃL[͓Ă邩܂ʂv); next; endif;
zukan(item:,==,0); if(nowres); text(1,(face=+evfch,swait=-1),ux̃p\RœꂽƂ񂪋CɂȂ܂ȁBԈႦɃS[֒H蒅AƂł傤ȁBw閧xƂ[hɕo͂܂ʂȁv); next; endif;
not; item(check:eq,,1); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*Agl]x̒nɂāAԈႦɃS[֒H蒅Ƃœł̂łȁv); next; endif;
zukan(warppos:hyper,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{aSe]x̉ij̋LqɗLƂw鋫xȂ̂CɂȂė܂ȁBw%map[*tB[h]x̂ȂڗqĂC܂v); next; endif;
zukan(enemy:ikenaitsuki,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*nCp[v[]xƂ炪TsȋC܂v); next; endif;
if(evf(*sw:pr_dfmoon) == 0); text(1,(face=+evfch,swait=-1),uw%map[*nCp[v[]xƂłcĂ邱Ƃ͂܂ʂłȁv); next; endif;
#w%map[*nCp[v[]xƂ炪C܂BX܂ŒT͂Ȃ܂
evflagsw(pr_deckbr,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uǂŉӖ[ɍĂ銴̐l܂ʂłȁBȂł邩܂ʂv); next; endif;
#ǂŉ獢Ă銴̐l悤ȊoL܂邼
#zukan(map:LmRʘHn,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*Ĉق猊]x́̋ԂɗLƂLqCɂȂ܂ȁBsƋA肪āAAɂ͉ĂȂꏊɐS͗L܂ʂȁBA𒍈Ӑ[ׂƗǂ܂ʂȁv); next; endif;
#if(evf(*sw:pr_chitei) == 0);
#ĂĎזȉӏɐS͗L܂ʂȁB〈ƂՂC܂
zukan(item:z,==,0); if(nowres); text(1,(face=+evfch,swait=-1),ulXȍЂ̋Nꏊł́Aɂ͍ЂȊO̎N邩܂ʂȁBAmɍЂ@L̂܂ʂBǂɃqg炵̂L܂ʂłȁv); next; endif;
not; item(check:eq,z,1); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*z]x͈ꉞ茳ɒuĂƗǂ܂ʂBw%map[*nCp[v[]x̗lXȍЂ̋Nꏊɂēł̂łȁv); next; endif;
if(evf(*sw:pr_chkexcomp) == 0); text(1,(face=+evfch,swait=-1),uƋ̂ƂꏊÂꂽŏ蒼ǂȂ̂ł傤ȁBCɂȂ܂ȁv); next; endif;
#ǂɂdwCxg̎WmFłꏊL܂ʂł
zukan(enemy:ikenai2,==,0); if(nowres); text(1,(face=+evfch,swait=-1),udwCxgԂȂꂽlqłȁBW߂ĊmFȂĂ݂Ă͂łȁBwƋ̂ꏊxŊmFłƂłȁv); next; endif;
#w%it[*ip[].nmicxɉCɂȂLqL悤ȋC܂
#w%it[*ip[].nmicxɋCɂȂLqL܂ȁBɏ͑Ă邩܂ʂ
if(evf(*sw:pr_dfmoon2) == 0); text(1,(face=+evfch,swait=-1),uG܂ȁH@w%it[*ip[].nmicxɗLLqCɂȂ܂ȁBQ̑Ώ@Ƃ̂́AɓȂꂽQ̃ACeJMɂȂĂC܂邼BCsȂȂAȑO܂ł͒ʂȂꏊ̂ǂɁAIȏ邩܂ʂv); next; endif;
#evflagsw(pr_dfmoon2,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%it[*ip[].nmicxɋCɂȂLqL܂ȁBw%it[*].nmicxƁw%it[*z].nmicxdvȋC܂BCsȂȂAȑO܂ł͒ʂȂꏊI܂ʂv); next; endif;
zukan(warppos:omake,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uɑSĒBȂꂽR̂悤ȋC܂BxAdwCxg̎WmFȂĂ݂Ă͂łȁB퓬͉߂čsȂĂvȋC܂v); next; endif;
#zukan(warppos:*all,!&,omake); if(nowres); text(1,(face=+evfch,swait=-1),uƋ̂ƂꏊÂꂽŏ蒼ǂȂ̂ł傤ȁBCɂȂ܂ȁv); next; endif;
text(1,(face=+evfch:sml,swait=-1),uSĒBȂĂ悤łȁBł킷v); next;
endif;

#ip[߃qg
if(evf(*selected) == 4);
zukan(enemy:*all,,(napul,garup,nabirt,shadagee)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*tB[h]x̑iΐF̏jłȁv); next; endif;
zukan(enemy:*all,,(regello,lybirzo,gelfez,tyupoke)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*tB[h]x̍iFjłȁv); next; endif;
zukan(enemy:*all,,(boodogar,garac,wehi)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*Agl]xłȁv); next; endif;
zukan(enemy:*all,,(napaler,garaper,nabatos)); unif(nowres); text(1,(face=+evfch,swait=-1),uOitB[hj̎niÂΐF̏jłȁv); next; endif;
zukan(enemy:*all,,(belzan,munjege,weigy,benjairar)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*LmRʘH]xłȁv); next; endif;
zukan(enemy:*all,,(pigmarg,steagral,tedsumari)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*tB[h]x̍rniF̏jłȁv); next; endif;
zukan(enemy:*all,,(napelest,garepest,nafatlus,dakyarmee)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{a]x̂Pe`Qełȁv); next; endif;
zukan(enemy:*all,,(regellgon,lybirzelk,rukanamu)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{aRe]xłȁv); next; endif;
zukan(enemy:*all,,(rashuuzan,garidrieni,idsuchi,zoclops)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*ip[{aSe]xłȁv); next; endif;
zukan(enemy:*all,,(napily,gapara)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*tB[h]x̐Xѕłȁv); next; endif;
zukan(enemy:*all,,(twire,antitwire,noimaged)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*tB[h]x̐󐣕iF̏jłȁv); next; endif;
zukan(enemy:*all,,(regellgo,lybirzel)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*tB[h]x̕XiFɐFjłȁv); next; endif;
zukan(enemy:*all,,(alshada)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*Agl]xłȁB኱܂ʂȁv); next; endif;
#zukan(enemy:*all,,alshada); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*Agl]xɂ͓Y̔ɃAȓGƂ\L܂BAgl̒ȂAn܂߂ĂǂɂłC܂v); evflag(enzyj,!=,0);if(nowres); text(1,(face=+evfch,swait=-1),uccAʂ̉BLIȂ̂oėn_ɂ͏oȂC܂ȁv); endif; next; endif;
zukan(enemy:*all,,(metaele,hollele)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*tB[h]xŖs̖ꏊ悤ȋC܂邼BȂ񂾂ꏊ͗L܂ʂłȁB蕨ɏĂĂ͔ȂC܂ȁv); next; endif;
#OitB[hjTsȋC܂邼
zukan(enemy:mush,==,0); if(nowres); text(1,(face=+evfch,swait=-1),uw%map[*LmRʘH]xɓ˔j悤ƂƂ͂܂ʂłȁv); next; endif;
#wsxł
#LmRʘH̉YȂĂC܂邼BwsxȋC܂
zukan(enemy:*all,,(mame,mame-2)); unif(nowres); text(1,(face=+evfch,swait=-1),uxZbgȂꂽ̂łȁBǂŶ͂낵܂ʂłȁv); next; endif;
zukan(enemy:*all,,(pregener,wolzo,galkan,pozgan)); unif(nowres); zukan(warppos:forest1,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*X̃_W]xłȁv); next; endif;
zukan(enemy:*all,,(bongen,nyamapoogi,medasorm,killson)); unif(nowres); zukan(warppos:forest2,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*X̃_WQ]xłȁv); next; endif;
zukan(enemy:*all,,(napilite,gaprill,pyalyash,galken,gartyo,ryavan,groszkopf)); unif(nowres); zukan(warppos:tower,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*]xłȁv); next; endif;
zukan(enemy:*all,,(syncerje,dezmeed,yogeere)); unif(nowres); zukan(warppos:haikyo,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*p]xłȁv); next; endif;
zukan(enemy:*all,,(pregenia,wolzards,galkin,pozgazn)); unif(nowres); zukan(map:pВn,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*p]x̒nłȁv); next; endif;
zukan(enemy:*all,,(doublame,bendogar,garasorma,nyamapregen,gidasorm,killjack,funqame)); unif(nowres); zukan(warppos:mount,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*^̎R]x̑Ołȁv); next; endif;
zukan(enemy:*all,,(napilaty,gaprette,wagurtyu,ryuvzorm,yankeen)); unif(nowres); text(1,(face=+evfch,swait=-1),uw%map[*^̎R]x̌㔼łȁv); next; endif;
zukan(enemy:*all,,(chorma,rakatsu,tsannue)); unif(nowres); zukan(map:^̎RQ,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*^̎R]x̉̓V󕔂łȁv); next; endif;
zukan(enemy:*all,,(umbot,gaogorg,qemizass)); unif(nowres); zukan(map:LmRʘHn,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*LmRʘH]x̒nłȁv); next; endif;
zukan(enemy:*all,,(napoluni,garupade,golzem,shajep)); unif(nowres); evflagsw(pr_honpen,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*tB[h]x̊CmiFȊO̐jłȁv); next; endif;
zukan(enemy:*all,,(valanorpa,mutou,boruv,demond)); unif(nowres); evflagsw(pr_seacave,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*Ĉق猊]xłȁv); next; endif;
zukan(enemy:*all,,(grpeng,devigry,maru,rkdns)); unif(nowres); zukan(warppos:hyper,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*nCp[v[]xłȁv); next; endif;
zukan(enemy:*all,,(shina,senksha,dhmo)); unif(nowres); zukan(warppos:hyper,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),uw%map[*nCp[v[]x̃LLZłȁv); next; endif;
zukan(enemy:*all,,(jshina,senkshag,dhmopure)); unif(nowres); evflagsw(pr_dfmoon,==,0); if(nowres); goto(3); endif; text(1,(face=+evfch,swait=-1),u󒆕VŒʍsł̈̓̂ǂ炪łȁB܂ōs_WA߂ĒTĂ݂Ă͂ǂłȁv); next; endif;
#w%it[*alerm].nmicxȂǂgƁA֗܂ʂ
#Ђłqg]Ă悤ȋC܂邼BqgȂȂ΁Ax𓖂Ɖvt邩܂ʂ
zukan(enemy:*all,,(coral,ikenaitsuki,ikenai2)); unif(nowres); text(1,(face=+evfch,swait=-1),u͂dwCxg֌WȋC܂ȁv); next; endif;
evflag(enzyj,!=,0); if(nowres);
zukan(enemy:*all,,(yj-a1,yj-b1,yj-c1,yj-a2,yj-b2,yj-c2,yj-a3,yj-b3,yj-c3,yj-a4)); unif(nowres); text(1,(face=+evfch,swait=-1),u̊Ԃɂg悤łȁBɂẮAَ҂ɂ͂܂zt܂ʂȁcv); next; endif;
endif;
evflag(enzyj2,!=,0); if(nowres);
#zukan(enemy:*all,,(yj-a5)); unif(nowres); text(1,(face=+evfch,swait=-1),ugŌ̈ɂȂ悤łȁB[ށcc܂ł̗ꂩ@ɁAwSx̂ƎȏŁA炵KɕĂƏoėC܂邩ȁccv); next; endif;
zukan(enemy:*all,,(yj-a5)); unif(nowres); text(1,(face=+evfch,swait=-1),uXɘg悤łȁB[ށcc܂ł̗ꂩ@ɁAwSx̂ƎȏŁA炵KɕĂƏoėC܂邩ȁHv); next; endif;
endif;
#evflag(enzyj2,==,0); or; zukan(enemy:*all,,(yj-a5)); unif(nowres); text(1,(face=+evfch,swait=-1),u̊Ԃɂg悤łȁBɂẮAَ҂ɂ͂܂zt܂ʂȁcv); next; endif;
#BǁASă_W̓Ō悤ȋC͂܂Be_W߂ČĉĂ݂Ă͂łȁBWɗ܂ʂ
#ӏɕUĂC܂
#BRӏ炢ɕUĂC܂
#B₵ȏAxe_WĉĂ݂Ă
#BAꃖɏWĂ͂ȂC܂B߂ĂTĂ݂邵Ȃł傤
text(1,(face=+evfch:sml,swait=-1),uRvCgȂĂ܂ȁB炢Iv); next;
label(3); text(1,(face=+evfch,swait=-1),ȕ͂ȂȋC܂ȁv); next;
endif;

#qgɂ
if(evf(*selected) == 5);
text(1,(face=+evfch,swait=-1),uqg𕷂ĂAyieBȂǂ͈ؖ悤łBtɌ΁Aqg؎gȂɂTƂłȁBC˂ȂgĂv\ruǁAqg𕷂Ȃi߂̂̓k߂邩܂ʂ䂦A܂͕ɎsȂĂ݂̂߂ł͂܂ȁv); next;
#ǁAqg𕷂ȂĂBł悤Ȑ݌vS|Ă͂悤ł䂦Aqg𕷂Ȃi߂̂̓k߂邩܂ʁB܂͕ɎsȂĂ݂̂߂ł͂܂
endif;

if(evf(*selected) == -2);
text(1,(face=+evfch,swait=-1),uƂ͖@Ȃv); end;
endif;

text(1,(face=+evfch,swait=-1),u悤ł킷v); end;
wend;

label(2);
#evflag(*selected,==,2); if(nowres); text(1,(face=+evfch,swait=-1),uCs܂ʂ̂cv); goto(4); endif;
if(evf(*selected) == 3); text(1,(face=+evfch,swait=-1),ûłȁv); goto(4); endif;
label(4); subevent(recover2,); text(0,SI); end;
#label(4); subevent(recover,); end;


<prs1>
fcwait(*target);

#party(check,lKCRc,2,-1);
#formem(party); member(select,job,E,==,iKCRc); and; member(select,exilev,mca); and; member(select,pcond,cond,ωp,==,0); nextmem(exis); if(nowres);
formem(party); member(select,job,E,==,iKCRc); and; member(select,exilev,mca); and; member(select,picset,fch,org:nrm,==,*none); nextmem(exis); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@KCRcI@|您IIv);
#text(1,face=*lKCRc,%mem[8]u邹I@ԂEIIv);
#member(job,,==,); or; member(job,,==,); if(nowres); text(1,face=+select,%mem[s]u邳ˁI@ԂEIIv);
#member(select,job,,==,); or; member(select,job,,==,); or; member(select,job,,==,); if(nowres);
fc(*slcmem,jump,=,128); fcwait(*slcmem);
member(select,job,,exis,,n); if(nowres);
text(1,face=+select,%mem[s]u܂ȁI@ԂEĂ悤IHv);
else;
text(1,face=+select,%mem[s]u邹I@ԂEIIv);
endif;
end;
endif;

#formem(party); member(select,job,E,==,icq); and; member(select,exilev,mca); and; member(select,pcond,cond,ωp,==,0); nextmem(exis); if(nowres);
formem(party); member(select,job,E,==,icq); and; member(select,exilev,mca); and; member(select,picset,fch,org:nrm,==,*none); nextmem(exis); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@cqI@IIv);
end;
endif;

fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@ip[I@|您IIv);
text(1,face=+head,%mem[h]u(P[P)v);
end;
endif;

fc(*actor,pic,==,shikyuu); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@ip[IIv);
fc(*target,spd,=,8); fc(*target,ans,=,8);
text(1,face=+evfch,uccH@Ⴄ́HHv);
end;
endif;

fc(*actor,pic,==,maneki); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@ʂI@킢IIv);
end;
endif;

fc(*actor,pic,==,buzzou); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@I@LIIv);
end;
endif;

fc(*actor,pic,>=,kokeshi); and; fc(*actor,pic,<=,buzzou); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@l`ĂI@|您IIv);
end;
endif;

fc(*actor,pic,==,demond); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@I@IIv);
end;
endif;

fc(*actor,pic,==,grpeng); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@yMI@킢IIv);
end;
endif;

fc(*actor,pic,==,devigry); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@ibcI@IIv);
end;
endif;

fc(*actor,pic,==,rkdns); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@I@IIv);
end;
endif;

fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@ȂI@IIv);
end;
endif;

fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@Ő[^̃{bgI@IIv);
end;
endif;

fc(*actor,pic,==,dhmo); or; fc(*actor,pic,==,dhmopure); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@m炸I@|您IIv);
end;
endif;

fc(*actor,pic,==,coral); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@X肾I@ӂIIv);
end;
endif;

fc(*actor,pic,==,ikenaitsuki); or; fc(*actor,pic,==,ikenai2); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,u킠I@lI@ӂIIv);
end;
endif;

fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres);
#fc(*target,spd,=,32); fc(*target,ans,=,32); text(1,(face=+evfch,lwait=20),uI@ϑԂI@|);
fc(*target,spd,!=,0); if(nowres);
#fc(*target,spd,=,32); fc(*target,ans,=,32); text(1,(face=+evfch,lwait=20),uI@ȂĐI);
fc(*target,spd,=,32); fc(*target,ans,=,32); text(1,(face=+evfch,lwait=20),uI@IoI@|);
fc(*target,spd,=,0); fc(*target,ans,=,0); text(1,face=+evfch,u͂cc͂ccv);
else;

text(1,face=uam,Sɍ݂炸ƂȂĂēȂcB);
#SԂɂȂĂēȂBזȂ瑼̎pŘb|Ă݂悤B

#mlݖh~pn
select2(reset,all);
select2(+ǂĂ炤(id=0));
select2(+T[rX(id=1));
select2(+Ȃ);
select2(*(cid=));

evflag(*selected,==,0); if(nowres);
fc(*target,spd,=,8); fc(*target,ans,=,8); text(1,face=+evfch,u͂A̂܂܂Ɂccv);
endif;

evflag(*selected,==,1); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
fade(out,(type=fade,color=000000,wait=32));
sound(heart); text(1,face=+evfch,úA͂ЂIv);
fade(in,(type=fade,color=000000,wait=32));
fc(*target,spd,=,0); fc(*target,ans,=,0); text(1,face=+evfch,u͂cc͂ccӂv);
endif;

endif;
end;
endif;

fc(*actor,pic,>=,yj-a3); and; fc(*actor,pic,<=,yj-c3); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
#text(1,face=+evfch,uI@قƂǑSI@|您IIv);
text(1,face=+evfch,uI@IoI@|您IIv);
end;
endif;

fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-c2); if(nowres);
fc(*target,spd,=,32); fc(*target,ans,=,32);
#fc(*target,spd,=,8); fc(*target,ans,=,8);
text(1,face=+evfch,uI@ȂĐIȊiDI@|您IIv);
#text(1,face=+evfch,uƁAƂĂIȊiDˁccIv);
#text(1,face=+evfch,uI@ϑԂI@|您IIv);
#text(1,face=+evfch,u킠I@sI@|您IIv);
#text(1,face=+evfch,uЂAȂĐIȊiDI@͂͂EEEv);
#fc(*target,spd,=,8); fc(*target,ans,=,8); text(1,face=+evfch,uEEEӂv);
#text(1,face=+head,%mem[h]uEEEv);
end;
endif;

fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c1); if(nowres);
fc(*target,spd,=,8); fc(*target,ans,=,8);
#fc(*target,spd,=,32); fc(*target,ans,=,32);
text(1,face=+evfch,uO̓ip[BEEĕ|ˁccccHv);
#text(1,face=+evfch,uȏɖGLIH@|您IIv);
#text(1,face=+evfch,uI@̗dI@|您IIv);
#text(1,face=+evfch,uccȎpɂ́ccf킳ȂIHv);
#text(1,face=+evfch,uccv);
end;
endif;

fc(*actor,pic,>=,person1a); and; fc(*actor,pic,<=,person6b); if(nowres);
fc(*target,spd,=,8); fc(*target,ans,=,8);
text(1,face=+evfch,uO̓ip[BEEĕ|ˁccv);
end;
endif;

fc(*target,spd,=,8); fc(*target,ans,=,8);
text(1,face=+evfch,uO̓ip[BEEĕ|Ȃccv);


<prs_rcv>
fcwait(*actor);
fc(*target,picset,fch,org:nrm,==,wtfairy); if(nowres);
fc(*actor,pic,>=,mame); if(nowres);
#text(1,face=+evfch,upςĂ񂾂ˁv);
text(1,face=+evfch,upς̂Ċyˁv);
else;
text(1,face=+evfch,uG̍U󂯂Ɓw%ct2%cdp[*vp]%cdxĂ̂čsǁAꂪ0ɂȂ|Ă܂CtĂˁB%cdp[*vp]͂́w%o[*uam]x}[NɐG%c088S%cdByieBƂ͖ǂǂgĂˁv);
#text(1,,u%c080%o[*uam]}[N%cdɐG%c084%cdp[*vp]igoj%cd%c088S%cdByieBƂ͖ǂǂgĂˁv);
#Ƃɓ̂ʓ|LAwx́w\ݒxwƂő񕜁xnmɂƁAƂ̏ɍsŉ񕜂ł
#text(1,,umɂ́AG|ƂŃQbgłw%c088o%cdxBꂪ܂%c080i%cd(x)オāAŋȂ񂾂v);
#%c880n(ỎF)%cdӂ܂ōsƋGoė邯ǁA
#%c080(邢΂̏)%cd̎アG|ĂƁAȂĊyɏĂ悤ɂȂėv
#mɂ́AG|Łw%c088o%cdx@܂ƁA%c080i%cd(x)オċȂ񂾂
#%c080i%cd(x)オƊyɏĂ悤ɂȂėB%c080i%cd͓G|āw%c088o%cdx߂čsΎRɏオB܂͑(邢΂̏)̎アG|ĉƗǂ
endif;
fc(*target,picset,fch,org:nrm,=,wtfairy-t);
#fc(*target,facepic,nrm,=,robot);
else;
fc(*actor,pic,>=,mame); if(nowres);
text(1,face=+evfch,u퓬̎pƕς΂̂ɂˁv);
#text(1,face=+evfch,uɂ́ApɂĔςl݂BłA͐擪̐l̎pɉĂ̂ݕς݂Aʂł̕ϐg𗘗pĂꍇ͒ӂĂˁv);
#text(1,face=+evfch,ułAȂ̂͂̉Ƃ̐lBAIȐlB炢݂Bl^vtȂĂ݂̂ǁAw%it[*ω̎].nmicxɂĂ̐ݒ肪܂ĂȂĂ̂ƂAeľ͂ȂׂBɂĂĂ̂Ƃv\ruƁA͐擪̐l̎pɉĂ̂ݕς݂Bʂł̕ϐg𗘗pĂꍇ͒ӂĂˁv);
#vC[̑zɔC݂ɐN悤ŋC
else;
text(1,face=+evfch,u%nams[*name]ȂÅK̖{Ĩׂ̗p\RŕςBɂAՓx␫ʕύXȂǂ̐Fȋ@\ɂ邩AɂGĂ݂Ăˁv);
#łɓՓxI݂Ȃ̂
#ACe𗎂Ƃ藎ƂȂ肷̂Ɠ
#text(1,face=+evfch,unʂςƑoG̑gݍ킹ςBŏ獻niFj֓̂͂ƌȂA܂͑i΂̏jŒbƗǂBƁAG͖؂Ȃǂ鏊̕oՂv);
#ŏ獻niFj֓̂͂ƌBƓG͑A؂Ȃǂ鏊̕oՂv);
#G|o͂񑝂邩AxȂǂǂ񒧐킵čsƗǂB
#o͓|ꂽԁi퓬s\jłȂ璍ӂĂˁB
#lŗĂolܔ{ɂ͂ȂȂǁA{ɂ͂ȂB
#G̏oՂ́APȃ_ƂȂsɂȂ邩AGoƏoȂAoȂƏoՂȂ銴ɂȂĂ
#o܂ȂȂoȂs肾ǁAPȃ_ƂȂ݂̂BȂȂCɓ֖@񂾂
#%c840F%cdςɈӖ͖B̃eXgpB
endif;
fc(*target,picset,fch,org:nrm,=,*reset:nrm);
#fc(*target,facepic,nrm,=,*reset);
endif;


<prs_intr>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,u[pˁBBBv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,uX̎pˁv); end; endif;
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uӖA[pˁBBBv); end; endif;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,u悤ȃ{bgAƂ[AjŌoȂv); end; endif;
fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,uIH@ĂȂȂ́IHv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂĂAip[B͋\Ȃ炵ˁcv); end; endif;

#evflag(main,==,0,,1);
text(1,face=+evfch,úw%ct2%rsK%rĉق%re%cdxBȎ{݂͊KIɂĂ΂Ă񂾁B֌W҈ȊO̊Fl̔ƂĂ@\BĂ̐Éw%ct2ip[%cdxƌĂ΂׈̉gBɐI܂Ă񂾁I@[ˁv);
#̎҂̎@́A
#Đ֐iōsƃip[̊nL炵񂾁B[
evflagsw(pr_honpen,==,1); if(nowres);
text(1,face=+evfch,ułAȂip[̊nRU炵ĂꂽŁAa߂čsB{ɂ肪ƂI@%pty[e]A΁I@%mem[h]A΁Iv);
else;
text(1,face=+evfch,uǂɃip[̊nL炵A@ΉɌƎv񂾂ǁAǂɂ̂tȂȂcBł%pty[e]Ȃ炠茩Cv);
endif;
#ĂkӂɃip[̊nL炵񂾁B
#w%ctdip[{a%cdx
#gƂύX鎖ł
#łɁA̐ʓύX@\ǁAS̐l`W߂ƁA{̗͑vfBȂƎgȂ@\Aʂɉւ炵B炭AʂɑBB
#label(1);
#text(1,face=+evfch,uXAL݂Ȃ̂o邯ǁAOI}PCxgƂ͊֌W炵v); end;
#̎ҒB̊ńAKIɂĂ΂Ă񂾁B


<prs_save>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,u肢ˁIH@ˁIHv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c3); or; fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,face=+evfch,uȂ́H@łȂƂAXeI^CvțZћZтĊ̎pˁBlIɂ͋ؓŃAObVuȊ̕D݂Ȃv); end; endif;
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uȂ́H@[ccؓȊOɃhLhL̂͏߂ĂBςȐEJĂ܂cv); end; endif;
#B{ǂȂĂAzƕ|Ȃc
#BSȏԂɂĂ܂悤ƁAȂזȂc
#BłȂƂȂ肵Ȃ̂Ȃ
#΍􂠂肵Ȃ̂Ȃ
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,u悤ȃ{bgAƂLȃt[Q[ŌoȂB􂷂AƃhhbȂv); end; endif;
fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,uIH@ăiCgȂ́IHv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂ񂾂ˁHv); end; endif;

text(1,face=+evfch,uZ[uiL^j͂ƎĂH@Z[uĂƂȂƁAQ[𒆒fAQ[I[o[ɂȂĂ܂ꍇłA蒼\ɂȂ̂I@j[́w%ct2%sysm[*save].nmic%cdxďłƂv\ruȂ݂Ƀj[̓LZ{^iwwx܂́weL[Ox܂́wobNXy[XxjΊJłBł%ctdwdrbxƃQ[̂Ă܂%cdAdrbŃj[J^CṽQ[ɊĂ邩͋CtĂ傤v\ruI@ł̃Q[%ctdo[WAbvƃZ[uf[^gɂȂȂȂ鎖%cdAo[WAbvĂꍇ͋CtĂˁIv\ruꂩA^́Av킮Ďŕs{ӂł͂񂾂ǁA߂ˁI@FӂĂˁIv);
#Ȃ݂Ƀj[̓L[{[ĥwAeL[̃[ŊJł
#%ct2eL[P܂͂`%cd

#formem(party); member(select,job,E,==,i); and; member(select,exilev,mca); and; member(select,pcond,cond,ωp,==,0); and; member(select,job,,exis,,gn); nextmem(exis); if(nowres);
#evflag(enzyj,!=,0); if(nowres);
formem(party); member(select,picset,face,org:nrm,==,kyokan-f);  nextmem(exis); if(nowres);
text(1,face=+evfch,uA̋ȌA^CvȂcBAɈӖ͖񂾂ǂˁBؓĂ˂v);
endif;
#endif;


<prs_joushuu>
#fc(*actor,pic,>=,mame); if(nowres);
#text(1,face=+evfch,upɂ锽̈Ⴂ́A܂ĂȂ݂Bw%it[*ω̎].nmicxɂĂ̐ݒ肪܂ĂȂĂ̂Ƃcv);
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,ucc{ȂˁHHv); end; endif;
fc(*actor,pic,==,seiyu); or; fc(*actor,pic,==,seiyu-2); if(nowres); text(1,face=+evfch,u̎pAɔNĕ͋CˁcHv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c1); if(nowres); text(1,face=+evfch,uƒEǂH@Ȃ񂩖ܑ̂ȂȂv); end; endif;
fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,u̎pA˂B߂D݂Ȃv); end; endif;
#fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,u̎pA߂D݂Ȃv); end; endif;
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uf炵p˂I@ڌłǂɂȂĂ܂I@łAȂǂɂȂȂAsvcȂcBƑCcv); end; endif;
#łA̐lB݂ɕςȊɂ͂ȂȂ݂BȂł낤ȂBȂ񂩎cOc
#łA̐lB݂ɉYꂻɂȂ݂Ȏ͂Ȃ݂BȂł낤ȂBȂ񂩎cOc
#̎pA߂D݂ȂBłA̐lB݂ɉYꂻɂȂ݂Ȏ͂Ȃ݂BȂł낤Ȃ
#cc̎pA߂D݂ȂB
#else;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uhȃLmCˁI@Ȃ񂩑A܂Ȃcv); end; endif;
fc(*actor,pic,==,demond); or; fc(*actor,pic,==,rkdns); or; fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,uȂɑ傫ƐHׂꂻɂȂȂcv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĕ݂ĂAU̖ɗ͓Ȃ݂BłAI}PxȏȂ瓾鎖͂邩HH@tɌƁAȉ𕷂߂ɂ͕ϐgKv邩炿ƋCtĂˁv); end; endif;

text(1,face=+evfch,uʂɐɐiޕɂ́A݂Ƃ͂ȂėǂƎvBłACɂȂ鎖ł畷݂AFXƌĉ肷ƗǂBӎUL≽CȂbłÃqgɂȂĂ鎖邩ˁIHv);
#text(1,face=+evfch,uqofĕʂ͕݂dvǁA{҂U邾ȂɋCɂȂđvƎvBACɂȂ鎖ł畷݂AFXƌĉ肷Ɨǂv\ruӎUL≽CȂbłÃqgɂȂĂ鎖邩ˁIH@U󋵂Ȃǂɉĕωꍇ邩v);
#text(1,face=+evfch,uqofĕʂ͕݂dvǁÃQ[%ct2Ƃ͉̒񕜃|CgȊOI}P%cd݂Ȃ񂾂A܂͖Đi߂đvv\ruACɂȂ鎖ł畷݂AFXƌĉ肷ƗǂBU󋵂Ȃǂɉĕωꍇ邩ˁv\ruqofSʁAӎULb≽CȂłÃqgɂȂĂ鎖Ă̂}ėǂˁv\ruccƂ^͖v킮ĎŌ鎖݂A}l͂ߒv܂B̃Q[ꉞA}𑹂Ȃ͔̂ĎŁÂ͍Tčsjł݂͂v);
#evflagsw(pr_honpen,==,1); if(nowres);
#text(1,face=+evfch,u΁AnɂpЂł͔ۂIoPpjĂƂ\邯ǁAĂ݂H@̃IoP̘bA牽̃qgɂȂĂ邩Ȃˁv);
#item(check:eq,toolset,1); or; evflagsw(pr_plane,==,1); if(nowres); text(1,face=+evfch,uAǂ̓͊ɉĂ݂ˁv); endif;
#endif;
#ȂAsl܂肵߂Čĉ̂ǂ
#Ɉ߂Ă̓}
#܂Aw͂܂ŃQ[łxČꂽ烍}͑Ȃ
#ƁAL[ȂƘb|Ȃl΁AG邾Řb|lB
#text(1,face=+evfch,u^Șb͖v킮HĎŌ鎖݂A}l͂ߒv܂B̃Q[ꉞA^Ȕ͍Tčsjł݂͂v\ru
#\ruccH@͉̎Ă񂾂낤Hv

#text(1,face=+evfch,uAFȐl̘b𕷂ĉƂȂBqofSʁAǂȌӎULbł͉̃qgɂȂĂBl̘b𕷂đ؂ˁI@ނł́Al̘b^Ɏ󂯂đ厸s鎖ǂˁcv);
#text(1,face=+evfch,uAFȐl̘b𕷂ĉƂȂBqofSʁAǂȌӎULbł͉̃qgɂȂĂ̂Bl̘b𕷂đ؂ˁIv\ruނł́Al̘b^Ɏ󂯂đ厸s鎖ǂˁcBƁAĂĘb|̂lBɂĂ͘b|Kv͖ƎvǁAG邾Řb鎖łv);
#text(1,face=+evfch,uW͂qofSʂ̊{BFȐl̘b𕷂Ă݂悤BǂȌӎULbł͉̃qgɂȂĂ̂Bl̘b𕷂đ؂ˁIv\ruނł́Al̘b^Ɏ󂯂đ厸s鎖ǂˁcBƁAĂĘb|̂ꍇ͑AG邾Řb鎖łv);
#text(1,face=+evfch,uxƍxɂ͓ʂȗvf͖āA܂ŉ񕜂ƏW̏ꂾBȂ݂ɁAW͂qofSʂ̊{BǂȌӎULbł̃qgɂȂĂ̂v);
#text(1,face=+evfch,uȂ݂ɁAW͂qofSʂ̊{BǂȌӎULbł̃qgɂȂĂ̂Bl̘b𕷂đ؂ˁI@ނł́Al̘b^Ɏ󂯂đ厸s鎖ǁcv);


<prs_ex>
#fc(*actor,pic,>=,mame); if(nowres);
#text(1,face=+evfch,uApςĂ񂾂ˁBłAȂ̂͂̃tÄꕔ̐lBAIȐlB炢݂cv);
#text(1,face=+evfch,uApςĂ񂾂ˁBłAȂ̂͂LԂ𑖂ĂlB炢݂cv);
#text(1,face=+evfch,uApςĂ񂾂ˁBłw%it[*ω̎].nmicxĂ܂苭͖͂āAyCs邾ł̐l鎖킩Ⴄ񂾂B^ȘbƁAS̔vtȂ݂ŁcB̂͂LԂ𑖂ĂlB炢v);
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uȂ񂩓`̃ip[C񂾂ǁAǂ{ۂCȂcB{ĂƂɂ̉ƐłAXflł͘Ro׋CɐGꂽłł͍ς܂Ȃcv); goto(1); endif;
fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,uccȂ񂩂ǂpˁBłAF̂qlȊOɂ͂ǂɂNȂĂȂcv); goto(1); endif;
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,ucc̎p͐ˁBȂ񂾂ςɂȂĂ܂Bi͊F̂qlȊOɂ͂C͑SNȂ̂ɂȂB悤ȁAACfeBeB悤ȁAGȋCv); end; endif;
#cc̎p͐ˁBȂƂȂUۂC邯ǁA{ɑC`RɂȂĂ܂ȂȂccBi͊F̂qlȊOɂ͂C͑SNȂ̂ɂȂB悤ȁAACfeBeB悤ȁAGȋC
#cc̎p͐ˁB{ɑC`RɂȂĂ܂ȂȂccBi͊F̂qlȊOɂ͂C͑SNȂ̂ɂȂB悤ȁAACfeBeB悤ȁAGȋC
#cc̎p͐ˁBĂƂȂ񂾂ȂႢBi͊F̎qȊOɂ͂C͑SNȂ̂ɁAςȋCB{ɑC`RɂȂĂ܂ȂȂcc
#else;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uv킸b|Ȃ炾ˁBŐ[ׂcv); end; endif;
fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,uɏĂ͎̂דȋCȂcv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂĂAGJEgɕω͖炵ˁv); end; endif;

text(1,face=+evfch,uG͊OKɕĂƏoėB%ct2_GJEg%cdĂˁB֐i߂ΐiޒAoėG͋GɂȂ邩CtĂˁBłG|āw%ct2%sysm[*ex].nmic%cdx𗭂߂čsƁAGɂyɏĂ悤ɂȂčsv\ru܂̖͂{ӂ̎アG|܂ƂBアƌĂAXflł͑ɂȂĂSȂ񂾂ǁccȂɉ҂v\ruAG|oRႦ邩AyɏĂȂ狭Gɂǂǂ񒧂ނƂIɋȂv\ruAo%ctd|Ă܂ԁi%cond[*]jႦȂ%cdAi΁AN|ꂽ瑬₩ɋAāÁw%o[*uam]x}[N̏ŉ񕜂قBȂ݂ɂ̃}[Ńw%ct2%rsF%rcނ܂%re%cdxČĂ΂Ăv);
#yɏĂ悤Ȃ֐i񂾕ȂBqgł͖Ȃ
#text(1,face=+evfch,uG͑A؂Ȃǂ鏊̕oՂAi͂ꏊ͂āACsꍇ͂Ēʂ悤ɂƗǂv);
#text(1,face=+evfch,unʂςƑAoG̑gݍ킹ςBႦ%c080i΂̏j%cd%c880niFj%cdł͏oGႤBƓG͑A؂Ȃǂ鏊̕oՂv);

#endif;

label(1);
fc(*target,walk,0,2,0,0,u);


<prs_battle>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uip[̎pŕ܂̂́AsސTƎvcv); end; endif;
#ǁAǂăip[ȏɁcH@H
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c1); if(nowres); text(1,face=+evfch,uȂ񂩔h肾ˁv); end; endif;
#[AlԂłȂƂĂʂɂǁA
fc(*actor,pic,>=,yj-a2); and; fc(*actor,pic,<=,yj-c2); if(nowres); text(1,face=+evfch,u͉BǂˁHv); end; endif;
#[AlԂłȂƂĂʂɂǁAƐFXBǂˁH
#[AlԂłȂƂĂʂɂǁAƔBǂˁH
#lԂ낤łȂ낤
fc(*actor,pic,>=,yj-a3); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,uƐFXo߂ȂˁHv); end; endif;
#[AlԂłȂƂĂʂɂǁAƔo߂ȂˁH
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a4-ert); if(nowres); text(1,face=+evfch,u܂ŏô͔ƍ߂ȂˁHv); end; endif;
fc(*actor,pic,>=,yj-a5); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,u܂ŏô͐Δƍ߂ˁHv); end; endif;
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,uLmCˁv); end; endif;
fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,u₵ĂĂˁv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂ񂾂ˁH@%pty[e]̕Ȃ镵͋ĆAXԐlł]݊ŖΊ邩Aȁ`ƂȂ킩񂾂v); end; endif;

text(1,face=+evfch,u퓬đIoėĉhȂǁA%pty[e]Ȃw%ct2%sk[*ʏU].nmic%cdxĂ̂Ił邾ł؂蔲Ǝvv\ruėw%ct2%sysm[*slcskill].nmic%cdxĂ݂ĂˁBŹw%ct2%cdp[*ep]%cdxĂ̂ȂƎgȂǁA̕B%cdp[*ep]́́w%o[*uam]x}[Nŉ񕜂邵A퓬Iɂ񕜂邩WWƂv);


<prs_pg>
fc(*actor,pic,>=,valanorpa); and; fc(*actor,pic,<=,mutou); if(nowres); text(1,face=+evfch,uip[ĎpłK݂Ă܂Ȃcv); end; endif;
fc(*actor,pic,>=,yj-a1); and; fc(*actor,pic,<=,yj-c3); if(nowres); text(1,face=+evfch,uĐlOȂ́H@lIɂ͊pƂƂĂlɂȂƎvȂv); end; endif;
#̎p̂ĉ҂Ȃ񂾂낤ˁH@X^[ApƂƂĂlɂȂƎvǂȂ
#KƂ
#BlԂƂAN̖ϑz̋ƂÂ
fc(*actor,pic,>=,yj-a4); and; fc(*actor,pic,<=,yj-a4-ert); if(nowres); text(1,face=+evfch,uǂȂꎅZȂlɂȂƎvȂBނAqw̖肪oĂ܂Ȃǂˁv); end; endif;
fc(*actor,pic,>=,yj-a5); and; fc(*actor,pic,<=,yj-a5-ert); if(nowres); text(1,face=+evfch,uA_Xccv); end; endif;
#̎p̂ĉ҂Ȃ񂾂낤ˁH@X^[AꎅZȂlɂȂƎvȂ
#BłꎅZĂĂ̂A͂ŗd͈
fc(*actor,pic,==,senksha); or; fc(*actor,pic,==,senkshag); if(nowres); text(1,face=+evfch,ũ{bgAs˂cB˂cv); end; endif;
fc(*actor,pic,==,shina); or; fc(*actor,pic,==,jshina); if(nowres); text(1,face=+evfch,uwȂxƂ\́Aŋ߂͑l̎ŔĂ݂ˁBˁcv); end; endif;
fc(*actor,pic,>=,mame); if(nowres); text(1,face=+evfch,upςĂĂ`킩BȂ񂽂āA%pty[e]ւ̐MS̓ĂႤˁIv); end; endif;

text(1,face=+evfch,uhȂǁAj[ʂZ[uʂ́A%ct2ẼL[Ńy[W̐؂ւł%cdBꍇ͘g̍E̒[ɖ󂪏oĂv\ru̎̋@̏iꗗB̕ɏȎŃy[Wԍƃy[WoĂv);
#̋@̏iꗗỉʁj
#B̓ȑɂẮAʂ̏̕Ƃɏoė
#text(1,face=+evfch,uACeZAނȂƃy[W͂ݏoႤǁAEL[głƑIłB̓ȑɂẮAʂ̏̕Ƃɏoėv);
#ڍ׉ʁỉʁjɂẮA`EreL[̂PERŐ؂ւ鎖łB

#ڍ׉ʁỉʁj̏ꍇ́A`EreL[̂PERŐ؂ւ鎖ł
#text(1,face=+evfch,uڍ׉ʁỉʁj̏ꍇ́A`EreL[̂PERŐ؂ւ鎖łBȄ̖㉺ɏoĂL͂Ӗv);
#text(1,face=+evfch,uACëꗗƂŁAẼ{^Ńy[W؂ւ鎖BhȂǁAꍇ͘g̍E̒[ɖ󂪏oĂB̕Ƀy[WԍoĂv);


#o[Ґ
<changemem>
text(1,face=uam,ł͒ԂOł܂B\n%ct2wxȂƕύX͔f܂B);
enparty(==,main); if(nowres); party(,changedlg,1); else; party(,changedlg,0); endif; if(nowres); subevent(kigae,); endif;
#memberdlg(,1); if(nowres); subevent(kigae,); endif;
#%cd\nƂ藷ĂT͂܂B


#DĂяo
<callship>
#zukan(warppos:*all,&,cv1_e); if(nowres);
evflagsw(pr_ship,==,1); if(nowres);
text(1,face=uam,dbBD߂ɌĂяo悤B);
select2(+Ă(id=0)); select2(+Ă΂Ȃ); select2(/); select2(*DĂԁH(cid=));
evflag(*selected,==,0); if(nowres); subevent(callship2,); text(0,DĂ񂾁I); endif;
else; text(1,face=uam,dbB); endif;
#else; text(1,face=uam,̋@\gɂ͖Ƒ悤B); endif;
#̋@\gɂ́Aɐi܂ȂĂ͎gȂ悤


#̋@iKj
<shop1>
text(1,face=uam,̔^@B\n%ct3̏ڍ׉ʂ͂`Er܂̓eL[PERŃy[W؂ւs܂B%cd);
#text(1,face=uam,̔^@B\n%ct3́w%sysm[*itsell].nmicxIƁAp[hƂȂ܂B%cd\n%ct3̏ڍ׉ʂ͂`Er܂̓eL[PERŃy[W؂ւs܂B%cd);
select2(reset,all); select2(adddtp,sysm,itbuy,); select2(adddtp,sysm,itsell,);
while;
select2(*@(cid=));
if(evf(*selected)==id(sysm:itbuy)); buy(shop1,only); next; endif;
if(evf(*selected)==id(sysm:itsell)); item(sell,); next; endif;
wend;
#buy(shop1,);


<kabegami>
text(1,face=uam,ɐGƁAɓ낤Ƃɏoėǎxo悤ɂȂ悤B);
evflagsw(ex_hokora,=,0);


<hondana>
#text(1,face=uam,ȂϓN{Î悤B);
text(1,face=+evfch,{ɂ́AƑŃvCɂ͋C܂Ȃ悤ȓeĂ邩܂̂ŁA\߂ӂB\n܂A퓬oX͖ggݒiKIȏA啪PƎv܂APčs\łB);
#ȂUƂ͖֌WȂ̂ŁA^ʖڂɃvC镪ɂ͑SCɂKv͂܂B
#܂茒Sł͂ȂeBĂ
#evflag(enzyj,!=,0); if(nowres);
#text(1,face=uam,̗vf͊ɔĂ܂Ă悤B);
#text(1,face=hondana,ȂA܏H̓Ɠ˂蕔Ƃŏoނɕ΂肪邽߁ATɂĂ͑S͌܂̂ŁAꉞӂidl̕sjB);
#else; text(1,face=uam,̏͊Yvf͔ĂȂ悤B); endif;
#text(1,face=hondana,`ǂݕ`\nF^`bnm);
#text(1,face=hondana,`ǂݕ`\nF^`bnm\n%ct3oKv͂܂B%cd);
#text(1,face=uam,wx́wxƓǂ݁Apł́w`bnmxƏ炵BvC[oKv͖̂悤B);
#text(1,(face=kanban,cwait=0),`ǂݕɂā`\nF^`bnm\ňF̂邬\n̏F̂\n쐯eFꂢ\n͌F傤^AX^XN\nCcF炵イ\n);
#text(1,cwait=0,`ǂݕ`\nF^`bnm\n͌F傤^AX^XN\n쐯eFꂢ\n^̎RF̂܁i~܂̂܁j);
#text(1,cwait=0,`ǂݕ`\nF^`bnm);
#text(1,cwait=0,`ǂݕ`\nF^`bnm);
#KF̂قi̎ҒB̊ńAKIɂĂ΂B֌W҈ȊO̐l̂߂̔ƂĂ@\j\n
#̌F̂邬\n̏F̂\nF񂹂\nF񂹂


<tansu>
text(1,face=uam,ȂϓN^X̂悤B);
#text(1,face=tansu,{ɂ́AƑŃvCɂ͋C܂Ȃ悤ȓeBĂ邩܂̂ŁA\߂ӂBȂAUƂ͖֌WȂ̂ŁA^ʖڂɃvC镪ɂ͑SCɂKv͂܂B);
#tɂꂪCɂȂꍇ́Aw҂Ɋ֘AԍxĂĂB
#\rtɂꂪCɂȂꍇ́Aw҂Ɋ֘AԍxJMɂȂĂ邩܂B
#\rtɂꂪCɂȂꍇ́ÃQ[̊SUڎwA͂ꏊŁwGWɉ҂̎ʔԍx͂ĂB


#񕜏̐
<ex_uam>
text(1,(face=uam, swait=-1),̉Ƃł́Aɂ%o[*uam]}[NɐG邱ƂŁA_[WX񕜂ł邼I\nȂǂ͊|Ȃ̂ŃWWp悤I);